home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 September / Macworld (1997-09).dmg / Shareware World / Utilities / Text Processing / Alpha / LaTeX / latex 2.09 / latexMode.tcl < prev    next >
Encoding:
Text File  |  1996-07-11  |  1001 b   |  30 lines  |  [TEXT/ALFA]
  1. #############################################################################
  2. #############################################################################
  3. #
  4. # latexMode.tcl (called from AlphaBits.tcl)
  5. #
  6. #############################################################################
  7. #############################################################################
  8.  
  9. set latexVersion "2.09"
  10. catch { enableMenuItem install "LaTeX 2e" on }
  11. catch { enableMenuItem install "LaTeX 2.09" off }
  12.  
  13. # Initialize LaTeX menus:
  14. proc latexMenu {} {}
  15. set latexMenu "•270"
  16.  
  17. # if {[lsearch $modes TeX] < 0} {lappend modes TeX}
  18. set dummyProc(TeX)                dummyTeX
  19. set modeMenus(TeX)                 { latexMenu }
  20. # Note:  Alpha's mode suffix mechanism is case-sensitive
  21. # lappend modeSuffixes            {*.sty} { set winMode TeX }
  22. # lappend modeSuffixes            {*.tex} { set winMode TeX }
  23. addMode TeX dummyTeX {*.tex *.sty} latexMenu
  24. addMenu latexMenu
  25.  
  26. set texKeyWords { }
  27. regModeKeywords -e {%} -m {\\} -c red -k blue TeX $texKeyWords
  28. unset texKeyWords
  29.  
  30.